SET QUOTED_IDENTIFIER OFF
GO
SET ANSI_NULLS OFF
GO
CREATE PROCEDURE [dbo].[paArreglarInscripcionesSinCalificaciones] AS

SET NOCOUNT ON
declare @inscF as int,@agenteF as int,@CargoF as int,@AsignaturaF as int,  @locF as int
declare @idinscE as int -- id inscripcion equivalente
declare @pje as float,@tv as int,@ct as int,@prom as float,@te as varchar(1),@tr as varchar(1)
--inscripciones sin puntaje

declare @convocatoria as int

set @convocatoria =27

DECLARE X CURSOR FORWARD_ONLY FOR
	select IC.IdInscripcionConvocatoria,ic.agente,IC.cargogenerico,ic.asignaturagenerica,ic.localidad from  tb_inscripcionesconvocatorias ic
	where  convocatoria=@convocatoria  and IdInscripcionConvocatoria 
--	where  convocatoria=@convocatoria and agente=57811 and IdInscripcionConvocatoria 
	not in (select Inscripcion from tb_CalificacionesDeInscripcion)
OPEN X

	FETCH NEXT FROM X INTO @inscF ,@agenteF,@CargoF ,@AsignaturaF ,  @locF -- @puntajeF ,@titulovaloradoF ,@categoriadetituloF ,@promediotituloF,@TituloEspecificoF ,@tituloRegistradoF 

	WHILE @@FETCH_STATUS = 0 BEGIN
		-- busco la inscripcion equivalente
		print 'busco la inscripcion equivalente'
		select @idinscE=isnull(min(idinscripcionConvocatoria),0),@pje=isnull(min( puntaje),0),@tv=isnull(min(titulovalorado),0),@ct=isnull(min(categoriadetitulo),0),@prom=isnull(min(promediotitulo),0),@te=isnull(min(TituloEspecifico),'N'),@tr=isnull(min(tituloRegistrado),'N')
		from tb_InscripcionesConvocatorias
		where agente=@agenteF and cargogenerico=@CargoF and 
		      asignaturagenerica=@AsignaturaF and convocatoria = @convocatoria 
		      and idinscripcionconvocatoria <> @inscF
		if @idinscE <> 0 
		begin
			--agrego las calificaciones para la inscripcion equivalente
			print 'agrego las calificaciones para la inscripcion equivalente'
			print 'inscrip faltante: ' + cast(@inscF as varchar) +'inscrip Equiv: ' + cast(@idinscE as varchar)
			INSERT INTO [SageNET].[dbo].[tb_CalificacionesDeInscripcion]([Inscripcion], [Concepto], [Puntaje])
			select @inscF,concepto,puntaje from tb_calificacionesdeinscripcion
			where inscripcion=@idinscE
	
			--actualizo los datos en la inscripcion faltante
			print 'actualizo los datos en la inscripcion faltante'
			update tb_inscripcionesconvocatorias set puntaje=@pje, titulovalorado=@tv,categoriadetitulo = @ct, promediotitulo=@prom,tituloespecifico=@te,tituloregistrado=@tr
			where  idInscripcionConvocatoria=@inscf
		end	
	FETCH NEXT FROM X INTO @inscF ,@agenteF,@CargoF ,@AsignaturaF ,  @locF

	end

CLOSE X
DEALLOCATE X
GO
